home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
Software Vault: The Gold Collection
/
Software Vault - The Gold Collection (American Databankers) (1993).ISO
/
cdr37
/
remfax.zip
/
ASKPWD.BAT
< prev
next >
Wrap
DOS Batch File
|
1993-06-01
|
2KB
|
84 lines
@echo off
ZUTIL P ASKPWD.ZVD /F400 /D%MV_BEEPLEN% /P%MV_PORT%
:START
if %1x==x goto OK
rem --- Ask digit
if %1==0 goto 0
if %1==1 goto 1
if %1==2 goto 2
if %1==3 goto 3
if %1==4 goto 4
if %1==5 goto 5
if %1==6 goto 6
if %1==7 goto 7
if %1==8 goto 8
if %1==9 goto 9
:NEXT
shift
goto START
:0
ZUTIL R /P%MV_PORT% /F400 /D%MV_BEEPLEN% /S1 /T20 *.ZYX
if errorlevel 11 goto ERROR
if errorlevel 10 goto NEXT
goto ERROR
:1
ZUTIL R /P%MV_PORT% /F400 /D%MV_BEEPLEN% /S1 /T20 *.ZYX
if errorlevel 12 goto ERROR
if errorlevel 11 goto NEXT
goto ERROR
:2
ZUTIL R /P%MV_PORT% /F400 /D%MV_BEEPLEN% /S1 /T20 *.ZYX
if errorlevel 13 goto ERROR
if errorlevel 12 goto NEXT
goto ERROR
:3
ZUTIL R /P%MV_PORT% /F400 /D%MV_BEEPLEN% /S1 /T20 *.ZYX
if errorlevel 14 goto ERROR
if errorlevel 13 goto NEXT
goto ERROR
:4
ZUTIL R /P%MV_PORT% /F400 /D%MV_BEEPLEN% /S1 /T20 *.ZYX
if errorlevel 15 goto ERROR
if errorlevel 14 goto NEXT
goto ERROR
:5
ZUTIL R /P%MV_PORT% /F400 /D%MV_BEEPLEN% /S1 /T20 *.ZYX
if errorlevel 16 goto ERROR
if errorlevel 15 goto NEXT
goto ERROR
:6
ZUTIL R /P%MV_PORT% /F400 /D%MV_BEEPLEN% /S1 /T20 *.ZYX
if errorlevel 17 goto ERROR
if errorlevel 16 goto NEXT
goto ERROR
:7
ZUTIL R /P%MV_PORT% /F400 /D%MV_BEEPLEN% /S1 /T20 *.ZYX
if errorlevel 18 goto ERROR
if errorlevel 17 goto NEXT
goto ERROR
:8
ZUTIL R /P%MV_PORT% /F400 /D%MV_BEEPLEN% /S1 /T20 *.ZYX
if errorlevel 19 goto ERROR
if errorlevel 18 goto NEXT
goto ERROR
:9
ZUTIL R /P%MV_PORT% /F400 /D%MV_BEEPLEN% /S1 /T20 *.ZYX
if errorlevel 20 goto ERROR
if errorlevel 19 goto NEXT
goto ERROR
:OK
set MV_PWDOK=Y
goto BYE
:ERROR
set MV_PWDOK=
:BYE